﻿Public Class Egarante
    Inherits Epersona

    Private recgarante As Integer

    Private cliente As String



    Public Sub New()
        MyBase.New()

        recibogarante = 0
    End Sub

    Public Property recibogarante() As Integer
        Get
            Return recgarante
        End Get
        Set(ByVal value As Integer)
            recgarante = value
        End Set
    End Property

    Public Property clientega() As String
        Get
            Return cliente
        End Get
        Set(ByVal value As String)
            cliente = value
        End Set
    End Property

End Class
